insert into lux_fattura

--------------- CANONE ANNO PRECEDENTE ------------****************************************

select '01','D',to_date (^DATA_FATTURAZIONE gg/mm/aaaa;A;ALFANUMERICO;1^^,'dd/mm/yyyy') dt_fat,
to_date (^DATA_SCADENZA gg/mm/aaaa;A;ALFANUMERICO;2^^,'dd/mm/yyyy') data_scad,'LU' protocollo,
substr(^DATA_FATTURAZIONE gg/mm/aaaa;A;ALFANUMERICO;1^^,7,4) as  anno_fattura,
'' num_fat,
 s.sog_id,s.nome,
 c.cimitero,
 ci.NOME_CIMITERO,
c.codice_defunto,
c.nome_defunto,
-------------- INDIRIZZO         -----------------

'', --concat(concat(concat(concat(concat (concat(ve.ELETOPO_DES,' '),concat(tipo_civico,concat(' ',s.CIVICO))),' '),s.SUFFISSO),' '),s.INTERNO) AS indirizzo,
'',--ve.cap_id,
'',--ve.decode_comune,
--------------------------------------------------
c.ubicazione,
c.numero_lampade,
 'CANONE ANNI PRECEDENTI --' AS DESCRIZIONE_VOCE,
(to_date(concat('31/12/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy') - c.dt_inizio +1 )giorni,

 round (
t.valore / (to_date(concat('31/12/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy') - to_date(concat('01/01/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy')+1 )
* (to_date(concat('31/12/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy')-c.dt_inizio +1)
 * c.numero_lampade ,2) imponibile,
 round( round (
t.valore / (to_date(concat('31/12/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy') - to_date(concat('01/01/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy')+1 )
* (to_date(concat('31/12/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy')-c.dt_inizio +1)
 * c.numero_lampade ,2) * t.iva / 100,2) imp_iva,
 '','',t.anno_applicazione,t.valore,T.IVA,'','','','',
 LUX_KEY_GEN.nextval,do.id_dom
 from lux_contratto c,lux_soggetto s,lux_tariffa T,lux_cimitero ci,lux_domiciliazione do,lux_contratto_bol cb
 
where
     s.sog_id = c.sog_id
and  c.cimitero = ci.cimitero
and  c.codice_tariffa = t.codice_tariffa
and  t.ANNO_APPLICAZIONE = ^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1
--and  c.DT_INIZIO >= to_date(concat('01/01/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy')
and  c.DT_INIZIO   <=  to_date(concat('31/12/',^ANNO COMPETENZA AAAA;N;NUMERICO;3^^-1),'dd/mm/yyyy')
--and  ve.elet_id(+) = s.elet_id
--and  ve.com_id(+) = s.com_id
--and C.NUM_FAT IS NULL
and  concat(c.cimitero,c.codice_defunto) not in (select distinct concat(f.cimitero,f.codice_defunto) from lux_fattura f--,lux_contratto c 
where tipo_riga = 'D' 
and storno is null
and c.codice_defunto=f.codice_defunto
and c.cimitero = f.cimitero
and f.DT_FAT<to_date (^DATA_FATTURAZIONE gg/mm/aaaa;A;ALFANUMERICO;1^^,'dd/mm/yyyy')
--and c.DT_FINE  = to_date('31129999','ddmmyyyy')
)

and do.sog_id = s.sog_id

and do.az_id = c.az_id
and do.az_id= s.az_id
and do.az_id = t.codice_azienda
and do.az_id = ci.az_id

 --and do.VER_DTFINE = to_date('31129999','ddmmyyyy')
 and cb.codice_defunto= c.codice_defunto
and cb.cimitero = c.CIMITERO


